home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / cgraphix / kaspect.c < prev    next >
Text File  |  1986-05-12  |  353b  |  22 lines
  1. /* «RM120»«PL99999»«TS4,8,12,16,20,24,28,32,36,40,44,48,52,56,60,64,68,72,76» */
  2. #include    <stdio.h>
  3. #define    EXTERN    extern
  4. #include    <typedef.h>
  5.  
  6.  
  7. void SetAspect(aspect)
  8. double    aspect;
  9. {
  10.     extern double    fabs();
  11.  
  12.     if (aspect != 0.0)
  13.         AspectGlb = fabs(aspect)*AspectFactor;
  14. }
  15.  
  16.  
  17. double GetAspect()
  18. {
  19.     return(AspectGlb/AspectFactor);
  20. }
  21.  
  22.